TeX 1995 July/TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO/macros/plain/contrib/springer/mathsing/mathsing.cmm

Text File | 1991-12-08 | 27.9 KB | 656 lines

% This is MATHSING.CMM, the plain TeX macro package
% (CM version) from Springer-Verlag
% for single author books in mathematics
% version 1.1 of October 1990
\font \tafontss               = cmbx5  scaled\magstep2
\font \tbfontss               = cmbx5  scaled\magstep1
\font \sixbf                  = cmbx6
\font \tafonts                = cmbx7  scaled\magstep2
\font \tbfonts                = cmbx7  scaled\magstep1
\font \ninebf                 = cmbx9
\font \tbfontt                = cmbx10 scaled\magstep1
\font \tafontt                = cmbx10 scaled\magstep2
\font \tasys                  = cmex10 scaled\magstep1
\font \tasyt                  = cmex10 scaled\magstep2
\font \sixi                   = cmmi6
\font \ninei                  = cmmi9
\font \tamssss                = cmmib10 scaled 600
\font \tamsss                 = cmmib10 scaled 833
\font \tamss                  = cmmib10
\font \tams                   = cmmib10 scaled\magstep1
\font \tamt                   = cmmib10 scaled\magstep2
\font \smallescriptscriptfont = cmr5
\font \smallescriptfont       = cmr5 at 7pt
\font \smalletextfont         = cmr5 at 10pt
\font \sixrm                  = cmr6
\font \ninerm                 = cmr9
\font \markfont               = cmr10 scaled\magstep1
\font \ninesl                 = cmsl9
\font \tensans                = cmss10
\font \fivesans               = cmss10 at 5pt
\font \sixsans                = cmss10 at 6pt
\font \sevensans              = cmss10 at 7pt
\font \ninesans               = cmss10 at 9pt
\font \tbst                   = cmsy10 scaled\magstep1
\font \tbsss                  = cmsy5  scaled\magstep1
\font \tasss                  = cmsy5  scaled\magstep2
\font \sixsy                  = cmsy6
\font \tbss                   = cmsy7  scaled\magstep1
\font \tass                   = cmsy7  scaled\magstep2
\font \ninesy                 = cmsy9
\font \tast                   = cmsy10 scaled\magstep2
\font \nineit                 = cmti9
\font \ninett                 = cmtt9
%-----------------------------------------------------------------

% Kodierungen zur automatischen Erstellung des Layouts:
\magnification=\magstep1
\vsize=19.3752 cm
\hsize=11.833 cm
\hfuzz=2pt
\tolerance=500
\abovedisplayskip=3 mm plus6pt minus 4pt
\belowdisplayskip=3 mm plus6pt minus 4pt
\abovedisplayshortskip=0mm plus6pt minus 2pt
\belowdisplayshortskip=2 mm plus4pt minus 4pt
\predisplaypenalty=0
\clubpenalty=10000
\widowpenalty=10000
\frenchspacing
\newdimen\oldparindent\oldparindent=5.833mm
\parindent=\oldparindent
%-----------------------------------------------------------------------
\def\newline{\hfil\break}
%
\def\litem{\par\noindent
               \hangindent=\parindent\ltextindent}
\def\litemitem{\par\noindent
               \hangindent=2\parindent\ltextindent}
\def\ltextindent#1{\hbox to \hangindent{#1\hss}\ignorespaces}
%
%-----------------------------------------------------------------------
%
%  Fontdefinitionen
%
% vektor-fonts
% petit-fonts
\skewchar\ninei='177 \skewchar\sixi='177
\skewchar\ninesy='60 \skewchar\sixsy='60
\hyphenchar\ninett=-1
%-----------------------------------------------------------------------
% Definition der versal griechischen Buchstaben
%=======================================================================
  \mathchardef\Gamma="0100
  \mathchardef\Delta="0101
  \mathchardef\Theta="0102
  \mathchardef\Lambda="0103
  \mathchardef\Xi="0104
  \mathchardef\Pi="0105
  \mathchardef\Sigma="0106
  \mathchardef\Upsilon="0107
  \mathchardef\Phi="0108
  \mathchardef\Psi="0109
  \mathchardef\Omega="010A
%-----------------------------------------------------------------------
\def\sun{\hbox{$\odot$}}
\def\la{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr<\cr\noalign{\vskip1.5pt}\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr<\cr
\noalign{\vskip1.0pt}\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr<\cr
\noalign{\vskip0.5pt}\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
<\cr\noalign{\vskip0.5pt}\sim\cr}}}}}
\def\ga{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\noalign{\vskip1.5pt}\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr>\cr
\noalign{\vskip1.0pt}\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr>\cr
\noalign{\vskip0.5pt}\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
>\cr\noalign{\vskip0.5pt}\sim\cr}}}}}
\def\sq{\hbox{\rlap{$\sqcap$}$\sqcup$}}
\def\degr{\hbox{$^\circ$}}
\def\arcmin{\hbox{$^\prime$}}
\def\arcsec{\hbox{$^{\prime\prime}$}}
\def\utw{\smash{\rlap{\lower5pt\hbox{$\sim$}}}}
\def\udtw{\smash{\rlap{\lower6pt\hbox{$\approx$}}}}
\def\fd{\hbox{$.\!\!^{\rm d}$}}
\def\fh{\hbox{$.\!\!^{\rm h}$}}
\def\fm{\hbox{$.\!\!^{\rm m}$}}
\def\fs{\hbox{$.\!\!^{\rm s}$}}
\def\fdg{\hbox{$.\!\!^\circ$}}
\def\farcm{\hbox{$.\mkern-4mu^\prime$}}
\def\farcs{\hbox{$.\!\!^{\prime\prime}$}}
\def\fp{\hbox{$.\!\!^{\scriptscriptstyle\rm p}$}}
\def\getsto{\mathrel{\mathchoice {\vcenter{\offinterlineskip
\halign{\hfil$\displaystyle##$\hfil\cr\gets\cr\to\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr\gets\cr
\to\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr\gets
\cr\to\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
\gets\cr\to\cr}}}}}
\def\cor{\mathrel{\mathchoice {\hbox{$\widehat=$}}{\hbox{$\widehat=$}}
{\hbox{$\scriptstyle\hat=$}}
{\hbox{$\scriptscriptstyle\hat=$}}}}
\def\grole{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\noalign{\vskip-1.5pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr
>\cr\noalign{\vskip-1.5pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr
>\cr\noalign{\vskip-1pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
>\cr\noalign{\vskip-0.5pt}<\cr}}}}}
\def\lid{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr<\cr\noalign{\vskip1.5pt}=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr<\cr
\noalign{\vskip1pt}=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr<\cr
\noalign{\vskip0.5pt}=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
<\cr
\noalign{\vskip0.5pt}=\cr}}}}}
\def\gid{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\noalign{\vskip1.5pt}=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr>\cr
\noalign{\vskip1pt}=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr>\cr
\noalign{\vskip0.5pt}=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
>\cr
\noalign{\vskip0.5pt}=\cr}}}}}
\def\sol{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr\sim\cr\noalign{\vskip-0.2mm}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr\sim\cr
<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr\sim\cr
<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
\sim\cr<\cr}}}}}
\def\sog{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr\sim\cr\noalign{\vskip-0.2mm}>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr\sim\cr
>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr\sim\cr
>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
\sim\cr>\cr}}}}}
\def\lse{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr<\cr\noalign{\vskip1.5pt}\simeq\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr<\cr
\noalign{\vskip1pt}\simeq\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr<\cr
\noalign{\vskip0.5pt}\simeq\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
<\cr
\noalign{\vskip0.5pt}\simeq\cr}}}}}
\def\gse{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\noalign{\vskip1.5pt}\simeq\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr>\cr
\noalign{\vskip1.0pt}\simeq\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr>\cr
\noalign{\vskip0.5pt}\simeq\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
>\cr
\noalign{\vskip0.5pt}\simeq\cr}}}}}
\def\grole{\mathrel{\mathchoice {\vcenter{\offinterlineskip
\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\noalign{\vskip-1.5pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr
>\cr\noalign{\vskip-1.5pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr
>\cr\noalign{\vskip-1pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
>\cr\noalign{\vskip-0.5pt}<\cr}}}}}
\def\leogr{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr<\cr\noalign{\vskip-1.5pt}>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr
<\cr\noalign{\vskip-1.5pt}>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr
<\cr\noalign{\vskip-1pt}>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
<\cr\noalign{\vskip-0.5pt}>\cr}}}}}
\def\loa{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr<\cr\noalign{\vskip1.5pt}\approx\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr<\cr
\noalign{\vskip1.0pt}\approx\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr<\cr
\noalign{\vskip0.5pt}\approx\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
<\cr
\noalign{\vskip0.5pt}\approx\cr}}}}}
\def\goa{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\noalign{\vskip1.5pt}\approx\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr>\cr
\noalign{\vskip1.0pt}\approx\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr>\cr
\noalign{\vskip0.5pt}\approx\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
>\cr
\noalign{\vskip0.5pt}\approx\cr}}}}}
\def\bbbr{{\rm I\!R}} %reelle Zahlen
\def\bbbn{{\rm I\!N}} %natuerliche Zahlen
\def\bbbm{{\rm I\!M}}
\def\bbbh{{\rm I\!H}}
\def\bbbf{{\rm I\!F}}
\def\bbbk{{\rm I\!K}}
\def\bbbp{{\rm I\!P}}
\def\bbbone{{\mathchoice {\rm 1\mskip-4mu l} {\rm 1\mskip-4mu l}
{\rm 1\mskip-4.5mu l} {\rm 1\mskip-5mu l}}}
\def\bbbc{{\mathchoice {\setbox0=\hbox{$\displaystyle\rm C$}\hbox{\hbox
to0pt{\kern0.4\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\textstyle\rm C$}\hbox{\hbox
to0pt{\kern0.4\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptstyle\rm C$}\hbox{\hbox
to0pt{\kern0.4\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptscriptstyle\rm C$}\hbox{\hbox
to0pt{\kern0.4\wd0\vrule height0.9\ht0\hss}\box0}}}}
\def\bbbe{{\mathchoice {\setbox0=\hbox{\smalletextfont e}\hbox{\raise
0.1\ht0\hbox to0pt{\kern0.4\wd0\vrule width0.3pt
height0.7\ht0\hss}\box0}}
{\setbox0=\hbox{\smalletextfont e}\hbox{\raise
0.1\ht0\hbox to0pt{\kern0.4\wd0\vrule width0.3pt
height0.7\ht0\hss}\box0}}
{\setbox0=\hbox{\smallescriptfont e}\hbox{\raise
0.1\ht0\hbox to0pt{\kern0.5\wd0\vrule width0.2pt
height0.7\ht0\hss}\box0}}
{\setbox0=\hbox{\smallescriptscriptfont e}\hbox{\raise
0.1\ht0\hbox to0pt{\kern0.4\wd0\vrule width0.2pt
height0.7\ht0\hss}\box0}}}}
\def\bbbq{{\mathchoice {\setbox0=\hbox{$\displaystyle\rm
Q$}\hbox{\raise
0.15\ht0\hbox to0pt{\kern0.4\wd0\vrule height0.8\ht0\hss}\box0}}
{\setbox0=\hbox{$\textstyle\rm Q$}\hbox{\raise
0.15\ht0\hbox to0pt{\kern0.4\wd0\vrule height0.8\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptstyle\rm Q$}\hbox{\raise
0.15\ht0\hbox to0pt{\kern0.4\wd0\vrule height0.7\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptscriptstyle\rm Q$}\hbox{\raise
0.15\ht0\hbox to0pt{\kern0.4\wd0\vrule height0.7\ht0\hss}\box0}}}}
\def\bbbt{{\mathchoice {\setbox0=\hbox{$\displaystyle\rm
T$}\hbox{\hbox to0pt{\kern0.3\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\textstyle\rm T$}\hbox{\hbox
to0pt{\kern0.3\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptstyle\rm T$}\hbox{\hbox
to0pt{\kern0.3\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptscriptstyle\rm T$}\hbox{\hbox
to0pt{\kern0.3\wd0\vrule height0.9\ht0\hss}\box0}}}}
\def\bbbs{{\mathchoice
{\setbox0=\hbox{$\displaystyle     \rm S$}\hbox{\raise0.5\ht0\hbox
to0pt{\kern0.35\wd0\vrule height0.45\ht0\hss}\hbox
to0pt{\kern0.55\wd0\vrule height0.5\ht0\hss}\box0}}
{\setbox0=\hbox{$\textstyle        \rm S$}\hbox{\raise0.5\ht0\hbox
to0pt{\kern0.35\wd0\vrule height0.45\ht0\hss}\hbox
to0pt{\kern0.55\wd0\vrule height0.5\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptstyle      \rm S$}\hbox{\raise0.5\ht0\hbox
to0pt{\kern0.35\wd0\vrule height0.45\ht0\hss}\raise0.05\ht0\hbox
to0pt{\kern0.5\wd0\vrule height0.45\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptscriptstyle\rm S$}\hbox{\raise0.5\ht0\hbox
to0pt{\kern0.4\wd0\vrule height0.45\ht0\hss}\raise0.05\ht0\hbox
to0pt{\kern0.55\wd0\vrule height0.45\ht0\hss}\box0}}}}
\def\bbbz{{\mathchoice {\hbox{$\sans\textstyle Z\kern-0.4em Z$}}
{\hbox{$\sans\textstyle Z\kern-0.4em Z$}}
{\hbox{$\sans\scriptstyle Z\kern-0.3em Z$}}
{\hbox{$\sans\scriptscriptstyle Z\kern-0.2em Z$}}}}
%-----------------------------------------------------------------------
\def\diameter{{\ifmmode\oslash\else$\oslash$\fi}}
%-----------------------------------------------------------------------
\newfam\sansfam
\textfont\sansfam=\tensans\scriptfont\sansfam=\sevensans
\scriptscriptfont\sansfam=\fivesans
\def\sans{\fam\sansfam\tensans}
%-----------------------------------------------------------------------
\let\FIG=N
\def\stackfigbox{\if
Y\FIG\global\setbox\figbox=\vbox{\unvbox\figbox\box1}%
\else\global\setbox\figbox=\vbox{\box1}\global\let\FIG=Y\fi}
%
\def\placefigure{\dimen0=\ht1\advance\dimen0by\dp1
\advance\dimen0by5\baselineskip
\advance\dimen0by0.333 cm
\ifdim\dimen0>\vsize\pageinsert\box1\vfill\endinsert
\else%keine seitenhohe Abbildung
\if Y\FIG\stackfigbox\else
\dimen0=\pagetotal\ifdim\dimen0<\pagegoal%akt. Seite ist noch nicht voll
\advance\dimen0by\ht1\advance\dimen0by\dp1\advance\dimen0by1.41666cm
\ifdim\dimen0>\pagegoal\stackfigbox
\else\box1\vskip5.833mm\fi
\else\box1\vskip5.833mm\fi\fi\fi\let\firstleg=Y}
%
% Abbildungen
\newdimen\picheight
\def\correctlength{\ifnum\mag<1200\divide\picheight by1200
\multiply\picheight by1000\relax\fi}
\def\begfig#1cm#2\endfig{\par\picheight=#1true cm\relax
\correctlength
\setbox1=\vbox{\dimen0=\picheight\advance\dimen0
by0.833cm\kern\dimen0\vskip-.8333\baselineskip#2}\placefigure}
%
\def\begdoublefig#1cm #2 #3 \enddoublefig{\begfig#1cm%
\line{\vtop{\hsize=0.46\hsize#2}\hfill
\vtop{\hsize=0.46\hsize#3}}\endfig}
%-----------------------------------------------------------------------
\let\firstleg=Y
% Abbildungslegenden
% Falls Text kleiner als eine volle Zeile, zentriert.
\def\figure#1#2{\if Y\firstleg\vskip0.833cm\else\vskip1.666mm\fi
\let\firstleg=N\setbox0=\vbox{\noindent\petit{\bf
Fig.\ts#1\unskip.\ }\ignorespaces #2\smallskip
\count255=0\global\advance\count255by\prevgraf}%
\ifnum\count255>1\box0\else
\centerline{\petit{\bf Fig.\ts#1\unskip.\
}\ignorespaces#2}\smallskip\fi}
%-----------------------------------------------------------------------
% Tabellenkoepfe
\def\tabcap#1#2{\vskip0.4166cm\vbox{\noindent\petit{\bf Table\ts
\ignorespaces#1\unskip.\
}\ignorespaces #2\vskip0.333cm}}
%-----------------------------------------------------------------------
\def\begtab#1cm#2\endtab{\par
\picheight=#1true cm\relax\correctlength
   \ifvoid\topins\midinsert\vbox{#2\hrule width1.666cm\kern\picheight
\hrule width1.666cm\vskip2.5mm}\endinsert
   \else\topinsert\vbox{#2\hrule width1.666cm\kern\picheight
\hrule width1.666cm\vskip2.5mm}\endinsert\fi}
%-----------------------------------------------------------------------
\def\begpet{\vskip6pt\bgroup\petit}
\def\endpet{\vskip6pt\egroup}
%-----------------------------------------------------------------------
% Referenzen
\newdimen\refindent
\newlinechar=`\|
\def\begref#1#2{\titlea{}{#1}%
\bgroup\petit
\setbox0=\hbox{#2\enspace}\refindent=\wd0\relax
\if!#2!\else
\ifdim\refindent>0.5em\else
\message{|Something may be wrong with your references;}%
\message{probably you missed the second argument of \string\begref.}%
\fi\fi}
\def\ref{\goodbreak
\hangindent1em\hangafter=1
\noindent\ignorespaces}
\def\refno#1{\goodbreak
\setbox0=\hbox{#1\enspace}\ifdim\refindent<\wd0\relax
\message{|Your reference `#1' is wider than you pretended in using
\string\begref.}\fi
\hangindent\refindent\hangafter=1
\noindent\kern\refindent\llap{#1\enspace}\ignorespaces}
\def\refmark#1{\goodbreak
\setbox0=\hbox{#1\enspace}\ifdim\refindent<\wd0\relax
\message{|Your reference `#1' is wider than you pretended in using
\string\begref.}\fi
\hangindent\refindent\hangafter=1
\noindent\hbox to\refindent{#1\hss}\ignorespaces}
\def\endref{\goodbreak\endpet}% Ende der Referenzen
%-----------------------------------------------------------------------
\def\vec#1{{\textfont1=\tenbf\scriptfont1=\sevenbf
\textfont0=\tenbf\scriptfont0=\sevenbf
\mathchoice{\hbox{$\displaystyle#1$}}{\hbox{$\textstyle#1$}}
{\hbox{$\scriptstyle#1$}}{\hbox{$\scriptscriptstyle#1$}}}}
%-----------------------------------------------------------------------
\def\petit{\def\rm{\fam0\ninerm}%
\textfont0=\ninerm \scriptfont0=\sixrm \scriptscriptfont0=\fiverm
 \textfont1=\ninei \scriptfont1=\sixi \scriptscriptfont1=\fivei
 \textfont2=\ninesy \scriptfont2=\sixsy \scriptscriptfont2=\fivesy
 \def\it{\fam\itfam\nineit}%
 \textfont\itfam=\nineit
 \def\sl{\fam\slfam\ninesl}%
 \textfont\slfam=\ninesl
 \def\bf{\fam\bffam\ninebf}%
 \textfont\bffam=\ninebf \scriptfont\bffam=\sixbf
 \scriptscriptfont\bffam=\fivebf
 \def\sans{\fam\sansfam\ninesans}%
 \textfont\sansfam=\ninesans \scriptfont\sansfam=\sixsans
 \scriptscriptfont\sansfam=\fivesans
 \def\tt{\fam\ttfam\ninett}%
 \textfont\ttfam=\ninett
 \normalbaselineskip=10pt
 \setbox\strutbox=\hbox{\vrule height7pt depth2pt width0pt}%
 \normalbaselines\rm
\def\vec##1{{\textfont1=\tamss\scriptfont1=\tamsss
\textfont0=\ninebf\scriptfont0=\sixbf
\mathchoice{\hbox{$\displaystyle##1$}}{\hbox{$\textstyle##1$}}
{\hbox{$\scriptstyle##1$}}{\hbox{$\scriptscriptstyle##1$}}}}}
%-----------------------------------------------------------------------
% "running head"
\headline={\petit\def\newline{ }\def\fonote#1{}\ifodd\pageno
\hfil\botmark\unskip\kern1.166 cm\llap{\folio}\else\leftheadline\fi}
\def\leftheadline{\rlap{\folio}\kern1.166 cm Chaptertitle\hfil}
\mark{Paragraphtitle}
\nopagenumbers
%
% Der Schalter \header gibt an, ob ein "running head" gedruckt werden
% soll; wenn er nicht auf "N" steht kommt ein solcher.
\let\header=Y
\newbox\figbox
\output={\if N\header\headline={\hfil}\fi\plainoutput
\global\let\header=Y\if Y\FIG\topinsert\unvbox\figbox\endinsert
\global\let\FIG=N\fi}
%-----------------------------------------------------------------------
\let\lasttitle=N
 % Beginn Ueberschrift 1. Ordnung
 \def\titlea#1#2{\vfill\eject
     \bgroup
 \textfont0=\tafontt \scriptfont0=\tafonts \scriptscriptfont0=\tafontss
 \textfont1=\tamt \scriptfont1=\tams \scriptscriptfont1=\tamss
 \textfont2=\tast \scriptfont2=\tass \scriptscriptfont2=\tasss
 \textfont3=\tasyt \scriptfont3=\tasys \scriptscriptfont3=\tenex
     \tafontt
     \baselineskip=18pt
     \lineskip=0pt
     \rightskip=0pt plus 6em
     \pretolerance=10000
\setbox0=\hbox{\petit\def\newline{ }\def\fonote##1{}%
\kern1.166 cm
     \if!#1!\ignorespaces#2
     \else\ignorespaces#1\unskip\enspace
     \ignorespaces#2\fi
     }\ifdim\wd0>\hsize
\message{Your TITLEA exceeds the headline, please use a short form with
TITLEARUNNING}\gdef\leftheadline{\rlap{\folio}\kern1.166 cm
Title of chapter suppressed due to excessive length\hfil}%
\else\gdef\leftheadline{\rlap{\folio}\kern1.166 cm
     \if!#1!\ignorespaces#2
     \else\ignorespaces#1\unskip\enspace\ignorespaces#2\fi
     \hfil}\fi\global\let\header=N
     \setbox0=\vbox{\noindent
     \if!#1!\ignorespaces#2
     \else\ignorespaces#1\unskip\enspace\ignorespaces#2\fi
     \par}%
     \dimen0=\ht0\advance\dimen0 by\dp0
     \ifdim\dimen0<120pt\vbox to 120pt{\box0\vfil}\else
     \unvbox0\vskip24pt\fi
     \egroup
     \nobreak
     \parindent=0pt
     \everypar={\global\parindent=\oldparindent
     \global\let\lasttitle=N\global\everypar={}}%
     \global\let\lasttitle=A%
     \ignorespaces}
%-----------------------------------------------------------------------
\def\titlearunning#1#2{%
\gdef\leftheadline{\rlap{\folio}\kern1.166 cm%
\if!#1!\ignorespaces#2
\else\ignorespaces#1\unskip\enspace\ignorespaces#2\fi
\hfil}%
\message{Excessive headline from TITLEA
has been corrected}\ignorespaces}
%-----------------------------------------------------------------------
 % Beginn Ueberschrift 2. Ordnung
 \def\titleb#1#2{%
     \if N\lasttitle\else\vskip-29pt
     \fi
     \vskip25pt plus 4pt minus4pt
     \bgroup
 \textfont0=\tbfontt \scriptfont0=\tbfonts \scriptscriptfont0=\tbfontss
 \textfont1=\tams \scriptfont1=\tamss \scriptscriptfont1=\tamsss
 \textfont2=\tbst \scriptfont2=\tbss \scriptscriptfont2=\tbsss
 \textfont3=\tasys \scriptfont3=\tenex \scriptscriptfont3=\tenex
     \baselineskip=16pt
     \lineskip=0pt
     \rightskip 0pt plus 6em
     \pretolerance=10000
     \tbfontt
     \setbox0=\vbox{\vskip25pt
     \def\fonote##1{}%
     \noindent
     \if!#1!\ignorespaces#2
     \else\ignorespaces#1\unskip\enspace\ignorespaces#2\fi
     \vskip15pt}%
     \dimen0=\pagetotal
     \ifdim\dimen0<\pagegoal
     \dimen0=\ht0\advance\dimen0 by\dp0\advance\dimen0 by
     4\normalbaselineskip
     \advance\dimen0 by\pagetotal
     \advance\dimen0 by-\pageshrink
     \ifdim\dimen0>\pagegoal\vfill\eject\fi\fi
     \noindent
     \if!#1!\ignorespaces#2
     \else\ignorespaces#1\unskip\enspace\ignorespaces#2\fi
     \par\nobreak
     \vskip12.5pt plus4pt minus4pt\egroup
     \setbox0=\hbox{\petit\def\newline{ }\def\fonote##1{}%
     \kern1.166 cm#1\unskip\enspace\ignorespaces#2}\ifdim\wd0>\hsize
     \message{Your TITLEB exceeds the headline, please use a short form
     with TITLEBRUNNING}\mark{Title of section suppressed
     due to excessive length}%
     \else{\def\newline{ }\def\fonote##1{}%
     \if!#1!\mark{\ignorespaces#2}%
     \else\mark{\ignorespaces#1\unskip\enspace\ignorespaces#2}\fi}\fi
     \nobreak
     \global\let\lasttitle=B%
     \parindent=0pt
     \everypar={\global\parindent=\oldparindent
     \global\let\lasttitle=N\global\everypar={}}%
     \ignorespaces}
%-----------------------------------------------------------------------
\def\titlebrunning#1#2{{\def\newline{ }\def\fonote##1{}
\if!#1!\mark{\ignorespaces#2}\else\mark{\ignorespaces#1\unskip
\enspace\ignorespaces#2}\fi}
\message{Excessive headline from TITLEB
has been corrected}\ignorespaces}
%-----------------------------------------------------------------------
 % Beginn Ueberschrift 3. Ordnung
 \def\titlec#1#2{%
     \if N\lasttitle\else\vskip-3pt\vskip-\baselineskip
     \fi
     \vskip17pt plus 4pt minus 4pt
     \bgroup
     \bf
     \raggedright
     \pretolerance=10000
     \setbox0=\vbox{\vskip 17pt
     \def\fonote##1{}%
     \noindent
     \if!#1!\ignorespaces#2
     \else\ignorespaces#1\unskip\enspace\ignorespaces#2\fi
     \vskip10pt}%
     \dimen0=\pagetotal
     \ifdim\dimen0<\pagegoal
     \dimen0=\ht0\advance\dimen0 by\dp0\advance\dimen0 by
     2\normalbaselineskip
     \advance\dimen0 by\pagetotal
     \advance\dimen0 by-\pageshrink
     \ifdim\dimen0>\pagegoal\vfill\eject\fi\fi
     \noindent
     \if!#1!\ignorespaces#2
     \else\ignorespaces#1\unskip\enspace\ignorespaces#2\fi
     \par\nobreak
     \vskip10pt plus4pt minus4pt\egroup
     \nobreak
     \global\let\lasttitle=C%
     \parindent=0pt
     \everypar={\global\parindent=\oldparindent
     \global\let\lasttitle=N\global\everypar={}}%
     \ignorespaces}
%-----------------------------------------------------------------------
 % Beginn Ueberschrift 4. Ordnung
 \def \titled#1{
     \if N\lasttitle\else\vskip-3pt\vskip-\baselineskip
     \fi
     \vskip5.833pt plus 4pt minus 4pt
     \bgroup
     \bf
     \noindent
     \ignorespaces #1\unskip\ \egroup
     \ignorespaces}
%-----------------------------------------------------------------------
 % Beginn Ueberschrift 5. Ordnung
 \def \titlee#1{
     \if N\lasttitle\else\vskip-3pt\vskip-\baselineskip
     \fi
     \vskip5.833pt plus 4pt minus 4pt
     \bgroup
     \it
     \noindent
     \ignorespaces #1\unskip\ \egroup
     \ignorespaces}
%-----------------------------------------------------------------------
\let\ts=\thinspace
\def\footnoterule{\kern-3pt\hrule width 1.666cm\kern2.6pt}
% Fussnoten-macros
\newcount\footcount \footcount=0
\def\advftncnt{\advance\footcount by1\global\footcount=\footcount}
% Automatisch numerierte Fussnote, Fussnotentex in petit
\def\fonote#1{\advftncnt$^{\the\footcount}$\begingroup\petit
       \def\textindent##1{\hangindent0.5\oldparindent\noindent\hbox
       to0.5\oldparindent{##1\hss}\ignorespaces}%
\vfootnote{$^{\the\footcount}$}{#1}\endgroup}
%-----------------------------------------------------------------------
% Acknowledgement
\def\ack#1{\vskip11pt\begingroup\noindent{\it Acknowledgements\/}.
\ignorespaces#1\vskip6pt\endgroup}
%-----------------------------------------------------------------------
\def\item#1{\par\noindent
\hangindent6.5 mm\hangafter=0
\llap{#1\enspace}\ignorespaces}
%-----------------------------------------------------------------------
\def\itemitem#1{\par\noindent
\hangindent11.5 mm\hangafter=0
\llap{#1\enspace}\ignorespaces}
%-----------------------------------------------------------------------
\def\newenvironment#1#2#3#4{\long\def#1##1##2{\removelastskip
\vskip\baselineskip\noindent{#3#2\if!##1!.\else\unskip\ \ignorespaces
##1\unskip\fi\ }{#4\ignorespaces##2\vskip\baselineskip}}}
% Lemma, Proposition, Theorem, Corollary
\newenvironment\lemma{Lemma}{\bf}{\it}
\newenvironment\proposition{Proposition}{\bf}{\it}
\newenvironment\theorem{Theorem}{\bf}{\it}
\newenvironment\corollary{Corollary}{\bf}{\it}
%-----------------------------------------------------------------------
% Example, Exercise, Problem, Solution, Definition
\newenvironment\example{Example}{\it}{\rm}
\newenvironment\exercise{Exercise}{\bf}{\rm}
\newenvironment\problem{Problem}{\bf}{\rm}
\newenvironment\solution{Solution}{\bf}{\rm}
\newenvironment\definition{Definition}{\bf}{\rm}
%-----------------------------------------------------------------------
%Note, Question
\newenvironment\note{Note}{\it}{\rm}
\newenvironment\question{Question}{\it}{\rm}
%-----------------------------------------------------------------------
%Proof, Remark
\long\def\remark#1{\removelastskip\vskip\baselineskip\noindent{\it
Remark.\ }\ignorespaces}
\long\def\proof#1{\removelastskip\vskip\baselineskip\noindent{\it
Proof\if!#1!\else\ \ignorespaces#1\fi.\ }\ignorespaces}
%-----------------------------------------------------------------------
\def\typeset{\petit\noindent This article was processed by the
author using
the \TeX{} macro package from Springer-Verlag.\par}
\outer\def\byebye{\bigskip\bigskip\typeset
\footcount=1\ifx\speciali\undefined\else
\loop\smallskip\noindent special character No\number\footcount:
\csname special\romannumeral\footcount\endcsname
\advance\footcount by 1\relax
\ifnum\footcount<11\repeat\fi
\vfill\supereject\end}
%-----------------------------------------------------------------------
\outer\def\bye{\bigskip\bigskip\typeset
\vfill\supereject\end}
%-----------------------------------------------------------------------
\def\qed{\ifmmode\sq\else{\unskip\nobreak\hfil
\penalty50\hskip1em\null\nobreak\hfil\sq
\parfillskip=0pt\finalhyphendemerits=0\endgraf}\fi}